inherited FrmCon_PedidoFaturamento: TFrmCon_PedidoFaturamento
  Left = 160
  Top = 90
  Caption = 'Consulta de Pedidos Para Faturamento'
  ClientHeight = 481
  OldCreateOrder = True
  OnActivate = FormActivate
  OnClose = FormClose
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  inherited GB: TGroupBox
    object Label1: TLabel
      Left = 16
      Top = 25
      Width = 148
      Height = 14
      Caption = 'Data para in'#237'cio da consulta'
    end
    object EdtData_inicial: TDateEdit
      Left = 168
      Top = 22
      Width = 89
      Height = 21
      NumGlyphs = 2
      TabOrder = 0
      OnKeyDown = EdtData_inicialKeyDown
    end
  end
  inherited Panel1: TPanel
    Top = 433
  end
  inherited Panel2: TPanel
    Height = 372
    object DbgPed: TDBGrid
      Left = 1
      Top = 1
      Width = 624
      Height = 370
      Align = alClient
      DataSource = DsPedido
      Options = [dgTitles, dgIndicator, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgConfirmDelete, dgCancelOnExit]
      TabOrder = 0
      TitleFont.Charset = ANSI_CHARSET
      TitleFont.Color = clWindowText
      TitleFont.Height = -11
      TitleFont.Name = 'Arial'
      TitleFont.Style = [fsBold]
      Columns = <
        item
          Expanded = False
          FieldName = 'bkp_pedido'
          Width = 74
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'ped_dataped'
          Width = 75
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'ped_pedclie'
          Width = 83
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'Situacao'
          Width = 118
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'PED_VALOR'
          Title.Caption = 'Valor'
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'ped_obs'
          Visible = True
        end>
    end
  end
  object CdsPedidos: TClientDataSet
    Aggregates = <>
    Params = <>
    Left = 328
    Top = 24
    object CdsPedidosbkp_pedido: TStringField
      DisplayLabel = 'Pedido'
      FieldName = 'bkp_pedido'
      Size = 9
    end
    object CdsPedidosped_dataped: TDateField
      DisplayLabel = 'Data'
      FieldName = 'ped_dataped'
    end
    object CdsPedidosped_pedclie: TStringField
      DisplayLabel = 'Ped.Cliente'
      FieldName = 'ped_pedclie'
      Size = 9
    end
    object CdsPedidosSituacao: TStringField
      DisplayLabel = 'Situa'#231#227'o'
      FieldName = 'Situacao'
      Size = 15
    end
    object CdsPedidosped_obs: TStringField
      DisplayLabel = 'Observa'#231#227'o do Pedido'
      FieldName = 'ped_obs'
      Size = 40
    end
    object CdsPedidosped_Situacao: TStringField
      DisplayLabel = 'Situa'#231#227'o'
      FieldName = 'ped_Situacao'
      Size = 1
    end
    object CdsPedidosPED_VALOR: TFloatField
      FieldName = 'PED_VALOR'
    end
  end
  object DsPedido: TDataSource
    AutoEdit = False
    DataSet = CdsPedidos
    Left = 360
    Top = 24
  end
end
